home *** CD-ROM | disk | FTP | other *** search
/ EnigmA Amiga Run 1997 February / EnigmA AMIGA RUN 15 (1997)(G.R. Edizioni)(IT)[!][issue 1997-02][PLANET CD V].iso / enigma / earcd / emula / arosdv19.lha / AROS / dos / selectoutput.c < prev    next >
C/C++ Source or Header  |  1996-10-24  |  2KB  |  74 lines
  1. /*
  2.     (C) 1995-96 AROS - The Amiga Replacement OS
  3.     $Id: selectoutput.c,v 1.4 1996/10/24 15:50:36 aros Exp $
  4.     $Log: selectoutput.c,v $
  5.     Revision 1.4  1996/10/24 15:50:36  aros
  6.     Use the official AROS macros over the __AROS versions.
  7.  
  8.     Revision 1.3  1996/08/13 13:52:51  digulla
  9.     Replaced <dos/dosextens.h> by "dos_intern.h" or added "dos_intern.h"
  10.     Replaced AROS_LA by AROS_LHA
  11.  
  12.     Revision 1.2  1996/08/01 17:40:58  digulla
  13.     Added standard header for all files
  14.  
  15.     Desc:
  16.     Lang: english
  17. */
  18. #include <clib/exec_protos.h>
  19. #include "dos_intern.h"
  20.  
  21. /*****************************************************************************
  22.  
  23.     NAME */
  24.     #include <clib/dos_protos.h>
  25.  
  26.     AROS_LH1(BPTR, SelectOutput,
  27.  
  28. /*  SYNOPSIS */
  29.     AROS_LHA(BPTR, fh, D1),
  30.  
  31. /*  LOCATION */
  32.     struct DosLibrary *, DOSBase, 50, Dos)
  33.  
  34. /*  FUNCTION
  35.     Sets the current output stream returned by Output() to a new
  36.     value. Returns the old output stream.
  37.  
  38.     INPUTS
  39.     fh - New output stream.
  40.  
  41.     RESULT
  42.     Old output stream handle.
  43.  
  44.     NOTES
  45.  
  46.     EXAMPLE
  47.  
  48.     BUGS
  49.  
  50.     SEE ALSO
  51.  
  52.     INTERNALS
  53.  
  54.     HISTORY
  55.     29-10-95    digulla automatically created from
  56.                 dos_lib.fd and clib/dos_protos.h
  57.  
  58. *****************************************************************************/
  59. {
  60.     AROS_LIBFUNC_INIT
  61.     AROS_LIBBASE_EXT_DECL(struct DosLibrary *,DOSBase)
  62.  
  63.     BPTR old;
  64.  
  65.     /* Get pointer to process structure */
  66.     struct Process *me=(struct Process *)FindTask(NULL);
  67.  
  68.     /* Nothing spectacular */
  69.     old=me->pr_COS;
  70.     me->pr_COS=fh;
  71.     return old;
  72.     AROS_LIBFUNC_EXIT
  73. } /* SelectOutput */
  74.